#' Valor medio
#'
#' A funçao retorna o valor medio por tipo de categoria
#'
#' @param base Data.Frame em análise
#' @param nome_variável Nome da coluna entre (" ")
#'
#' @return Valor de NAs e valor proporcional dos NA's sobre o total de elementos
#'
#' @export
#'
#'
#'
#'
#' library(magrittr)
library(tidyverse)
df2<-readr::read_rds("data/ames.rds")
sumarizar_venda_media <- function(base, par1){
base %>%
dplyr::group_by(base[,par1]) %>%
dplyr::summarise(media_valor = mean(venda_valor))
}
sumarizar_venda_media(df2, "lote_formato")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.